home *** CD-ROM | disk | FTP | other *** search
/ Total Network Tools 2002 / NextStepPublishing-TotalNetworkTools2002-Win95.iso / Archive / IRC Chat / polaris2001v304.EXE / Addons / find.ini < prev    next >
Encoding:
INI File  |  2001-04-06  |  11.3 KB  |  107 lines
  1. [Addon]
  2. Script=@Find (v.2001)
  3. Version=1.3
  4. Author=Tha_Loco1
  5. Desc=Originally For #Wrz on Dalnet - Now Reconfigured.
  6. Date=February 26th,01
  7. [script]
  8. n0=on 1:load: {
  9. n1=  set %bwchannels $readini $mircdir\Docs\Settings.ini Fserve Channels
  10. n2=  set %isfindon yes
  11. n3=  unset %bookwarezdir
  12. n4=  unset %bookwareztrigger
  13. n5=  if (%bwchannels == All) { set %bwchannels $chr(35) }
  14. n6=}
  15. n7=on 1:TEXT:@find*:%bwchannels: {
  16. n8=  set %bwchannels $readini $mircdir\Docs\Settings.ini Fserve Channels
  17. n9=  if (%bwchannels == All) { set %bwchannels $chr(35) }
  18. n10=  if ((%isfindon != yes) || ($2 == $null)) { return }
  19. n11=  unset %bwt.color.*
  20. n12=  if ($readini $mircdir\Docs\Settings.ini Colors Colors == On) { set %bwt.color1 $readini $mircdir\Docs\Settings.ini Colors Color.1 | set %bwt.color2 $readini $mircdir\Docs\Settings.ini Colors Color.2 }
  21. n13=  set %bwt.loctxt * $+ $replace($replace($replace($2-,$chr(32),*),_,?),-,*) $+ *
  22. n14=  if (% [ $+ [ cms_antiflood_find [ $+ [ $nick ] ] ] ] == %bwt.loctxt) { return } | set -u5 % [ $+ [ cms_antiflood_find [ $+ [ $nick ] ] ] ] %bwt.loctxt
  23. n15=  set %bwt.found $bwfindfile(%bwt.loctxt,0)
  24. n16=  if (%bwt.found > 100) { return }
  25. n17=  set %bwt.found1 $bwfindfile(%bwt.loctxt,1) | set %bwt.size1 $size($file(%bwt.found1).size) | set %bwt.found1 $remove(%bwt.found1,%bwt.temp) | set %bwt.trigger1 %bwt.trigger.temp
  26. n18=  if (%bwt.found > 1) { set %bwt.found2 $bwfindfile(%bwt.loctxt,2) | set %bwt.size2 $size($file(%bwt.found2).size) | set %bwt.found2 $remove(%bwt.found2,%bwt.temp) | set %bwt.trigger2 %bwt.trigger.temp }
  27. n19=  if (%bwt.found > 2) { set %bwt.found3 $bwfindfile(%bwt.loctxt,3) | set %bwt.size3 $size($file(%bwt.found3).size) | set %bwt.found3 $remove(%bwt.found3,%bwt.temp) | set %bwt.trigger3 %bwt.trigger.temp }
  28. n20=  if (%bwt.found > 3) { set %bwt.found4 $bwfindfile(%bwt.loctxt,4) | set %bwt.size4 $size($file(%bwt.found4).size) | set %bwt.found4 $remove(%bwt.found4,%bwt.temp) | set %bwt.trigger4 %bwt.trigger.temp }
  29. n21=  if (%bwt.found > 4) { set %bwt.found5 $bwfindfile(%bwt.loctxt,5) | set %bwt.size5 $size($file(%bwt.found5).size) | set %bwt.found5 $remove(%bwt.found5,%bwt.temp) | set %bwt.trigger5 %bwt.trigger.temp }
  30. n22=  if (%bwt.found == 0) {  .notice $nick Filename Not found. Please Try My FileServer, Or Change Your Search String }
  31. n23=  if (%bwt.found == 1) {
  32. n24=    .notice $nick  $+ %bwt.color1 $+ Matches Found:( $+ %bwt.color2 $+  $+ %bwt.found $+  $+ %bwt.color1 $+ )
  33. n25=    .notice $nick  $+ %bwt.color1 $+ Match:( $+ %bwt.color2 $+ 1 $+ %bwt.color1 $+ ) Trigger:( $+ %bwt.color2 $+  $+ %bwt.trigger1 $+  $+ %bwt.color1 $+ ) Directory:( $+ %bwt.color2 $+  $+ %bwt.found1 $+  $+ %bwt.color1 $+ ) Size:( $+ %bwt.color2 $+  $+ %bwt.size1 $+  $+ %bwt.color1 $+ )
  34. n26=  .notice $nick  $+ %bwt.color1 $+ To access my FileServer type the Trigger in the channel window  | goto done }
  35. n27=  if (%bwt.found == 2) { 
  36. n28=    .notice $nick  $+ %bwt.color1 $+ Matches Found:( $+ %bwt.color2 $+  $+ %bwt.found $+  $+ %bwt.color1 $+ )
  37. n29=    .notice $nick  $+ %bwt.color1 $+ Match:( $+ %bwt.color2 $+ 1 $+ %bwt.color1 $+ ) Trigger:( $+ %bwt.color2 $+  $+ %bwt.trigger1 $+  $+ %bwt.color1 $+ ) Directory:( $+ %bwt.color2 $+  $+ %bwt.found1 $+  $+ %bwt.color1 $+ ) Size:( $+ %bwt.color2 $+  $+ %bwt.size1 $+  $+ %bwt.color1 $+ )
  38. n30=    .notice $nick  $+ %bwt.color1 $+ Match:( $+ %bwt.color2 $+ 2 $+ %bwt.color1 $+ ) Trigger:( $+ %bwt.color2 $+  $+ %bwt.trigger2 $+  $+ %bwt.color1 $+ ) Directory:( $+ %bwt.color2 $+  $+ %bwt.found2 $+  $+ %bwt.color1 $+ ) Size:( $+ %bwt.color2 $+  $+ %bwt.size2 $+  $+ %bwt.color1 $+ )
  39. n31=  .notice $nick  $+ %bwt.color1 $+ To access my FileServer type the Trigger in the channel window | goto done }
  40. n32=  if (%bwt.found == 3) { 
  41. n33=    .notice $nick  $+ %bwt.color1 $+ Matches Found:( $+ %bwt.color2 $+  $+ %bwt.found $+  $+ %bwt.color1 $+ )
  42. n34=    .notice $nick  $+ %bwt.color1 $+ Match:( $+ %bwt.color2 $+ 1 $+ %bwt.color1 $+ ) Trigger:( $+ %bwt.color2 $+  $+ %bwt.trigger1 $+  $+ %bwt.color1 $+ ) Directory:( $+ %bwt.color2 $+  $+ %bwt.found1 $+  $+ %bwt.color1 $+ ) Size:( $+ %bwt.color2 $+  $+ %bwt.size1 $+  $+ %bwt.color1 $+ )
  43. n35=    .notice $nick  $+ %bwt.color1 $+ Match:( $+ %bwt.color2 $+ 2 $+ %bwt.color1 $+ ) Trigger:( $+ %bwt.color2 $+  $+ %bwt.trigger2 $+  $+ %bwt.color1 $+ ) Directory:( $+ %bwt.color2 $+  $+ %bwt.found2 $+  $+ %bwt.color1 $+ ) Size:( $+ %bwt.color2 $+  $+ %bwt.size2 $+  $+ %bwt.color1 $+ )
  44. n36=    .notice $nick  $+ %bwt.color1 $+ Match:( $+ %bwt.color2 $+ 3 $+ %bwt.color1 $+ ) Trigger:( $+ %bwt.color2 $+  $+ %bwt.trigger3 $+  $+ %bwt.color1 $+ ) Directory:( $+ %bwt.color2 $+  $+ %bwt.found3 $+  $+ %bwt.color1 $+ ) Size:( $+ %bwt.color2 $+  $+ %bwt.size3 $+  $+ %bwt.color1 $+ )
  45. n37=  .notice $nick  $+ %bwt.color1 $+ To access my FileServer type the trigger in the channel window  | goto done }
  46. n38=  if (%bwt.found == 4) { 
  47. n39=    .notice $nick  $+ %bwt.color1 $+ Matches Found:( $+ %bwt.color2 $+  $+ %bwt.found $+  $+ %bwt.color1 $+ )
  48. n40=    .notice $nick  $+ %bwt.color1 $+ Match:( $+ %bwt.color2 $+ 1 $+ %bwt.color1 $+ ) Trigger:( $+ %bwt.color2 $+  $+ %bwt.trigger1 $+  $+ %bwt.color1 $+ ) Directory:( $+ %bwt.color2 $+  $+ %bwt.found1 $+  $+ %bwt.color1 $+ ) Size:( $+ %bwt.color2 $+  $+ %bwt.size1 $+  $+ %bwt.color1 $+ )
  49. n41=    .notice $nick  $+ %bwt.color1 $+ Match:( $+ %bwt.color2 $+ 2 $+ %bwt.color1 $+ ) Trigger:( $+ %bwt.color2 $+  $+ %bwt.trigger2 $+  $+ %bwt.color1 $+ ) Directory:( $+ %bwt.color2 $+  $+ %bwt.found2 $+  $+ %bwt.color1 $+ ) Size:( $+ %bwt.color2 $+  $+ %bwt.size2 $+  $+ %bwt.color1 $+ )
  50. n42=    .notice $nick  $+ %bwt.color1 $+ Match:( $+ %bwt.color2 $+ 3 $+ %bwt.color1 $+ ) Trigger:( $+ %bwt.color2 $+  $+ %bwt.trigger3 $+  $+ %bwt.color1 $+ ) Directory:( $+ %bwt.color2 $+  $+ %bwt.found3 $+  $+ %bwt.color1 $+ ) Size:( $+ %bwt.color2 $+  $+ %bwt.size3 $+  $+ %bwt.color1 $+ )
  51. n43=    .notice $nick  $+ %bwt.color1 $+ Match:( $+ %bwt.color2 $+ 4 $+ %bwt.color1 $+ ) Trigger:( $+ %bwt.color2 $+  $+ %bwt.trigger4 $+  $+ %bwt.color1 $+ ) Directory:( $+ %bwt.color2 $+  $+ %bwt.found4 $+  $+ %bwt.color1 $+ ) Size:( $+ %bwt.color2 $+  $+ %bwt.size4 $+  $+ %bwt.color1 $+ )
  52. n44=  .notice $nick  $+ %bwt.color1 $+ To access my FileServer type the Trigger in the channel window  | goto done }
  53. n45=  if (%bwt.found == 5) { 
  54. n46=    .notice $nick  $+ %bwt.color1 $+ Matches Found:( $+ %bwt.color2 $+  $+ %bwt.found $+  $+ %bwt.color1 $+ )
  55. n47=    .notice $nick  $+ %bwt.color1 $+ Match:( $+ %bwt.color2 $+ 1 $+ %bwt.color1 $+ ) Trigger:( $+ %bwt.color2 $+  $+ %bwt.trigger1 $+  $+ %bwt.color1 $+ ) Directory:( $+ %bwt.color2 $+  $+ %bwt.found1 $+  $+ %bwt.color1 $+ ) Size:( $+ %bwt.color2 $+  $+ %bwt.size1 $+  $+ %bwt.color1 $+ )
  56. n48=    .notice $nick  $+ %bwt.color1 $+ Match:( $+ %bwt.color2 $+ 2 $+ %bwt.color1 $+ ) Trigger:( $+ %bwt.color2 $+  $+ %bwt.trigger2 $+  $+ %bwt.color1 $+ ) Directory:( $+ %bwt.color2 $+  $+ %bwt.found2 $+  $+ %bwt.color1 $+ ) Size:( $+ %bwt.color2 $+  $+ %bwt.size2 $+  $+ %bwt.color1 $+ )
  57. n49=    .notice $nick  $+ %bwt.color1 $+ Match:( $+ %bwt.color2 $+ 3 $+ %bwt.color1 $+ ) Trigger:( $+ %bwt.color2 $+  $+ %bwt.trigger3 $+  $+ %bwt.color1 $+ ) Directory:( $+ %bwt.color2 $+  $+ %bwt.found3 $+  $+ %bwt.color1 $+ ) Size:( $+ %bwt.color2 $+  $+ %bwt.size3 $+  $+ %bwt.color1 $+ )
  58. n50=    .notice $nick  $+ %bwt.color1 $+ Match:( $+ %bwt.color2 $+ 4 $+ %bwt.color1 $+ ) Trigger:( $+ %bwt.color2 $+  $+ %bwt.trigger4 $+  $+ %bwt.color1 $+ ) Directory:( $+ %bwt.color2 $+  $+ %bwt.found4 $+  $+ %bwt.color1 $+ ) Size:( $+ %bwt.color2 $+  $+ %bwt.size4 $+  $+ %bwt.color1 $+ )
  59. n51=    .notice $nick  $+ %bwt.color1 $+ Match:( $+ %bwt.color2 $+ 5 $+ %bwt.color1 $+ ) Trigger:( $+ %bwt.color2 $+  $+ %bwt.trigger5 $+  $+ %bwt.color1 $+ ) Directory:( $+ %bwt.color2 $+  $+ %bwt.found5 $+  $+ %bwt.color1 $+ ) Size:( $+ %bwt.color2 $+  $+ %bwt.size5 $+  $+ %bwt.color1 $+ )
  60. n52=  .notice $nick  $+ %bwt.color1 $+ To access my FileServer type the Trigger in the channel window  | goto done }
  61. n53=  if (%bwt.found > 6) { 
  62. n54=    .notice $nick  $+ %bwt.color1 $+ Matches Found:( $+ %bwt.color2 $+  $+ %bwt.found $+  $+ %bwt.color1 $+ )
  63. n55=    .notice $nick  $+ %bwt.color1 $+ Match:( $+ %bwt.color2 $+ 1 $+ %bwt.color1 $+ ) Trigger:( $+ %bwt.color2 $+  $+ %bwt.trigger1 $+  $+ %bwt.color1 $+ ) Directory:( $+ %bwt.color2 $+  $+ %bwt.found1 $+  $+ %bwt.color1 $+ ) Size:( $+ %bwt.color2 $+  $+ %bwt.size1 $+  $+ %bwt.color1 $+ )
  64. n56=    .notice $nick  $+ %bwt.color1 $+ Match:( $+ %bwt.color2 $+ 2 $+ %bwt.color1 $+ ) Trigger:( $+ %bwt.color2 $+  $+ %bwt.trigger2 $+  $+ %bwt.color1 $+ ) Directory:( $+ %bwt.color2 $+  $+ %bwt.found2 $+  $+ %bwt.color1 $+ ) Size:( $+ %bwt.color2 $+  $+ %bwt.size2 $+  $+ %bwt.color1 $+ )
  65. n57=    .notice $nick  $+ %bwt.color1 $+ Match:( $+ %bwt.color2 $+ 3 $+ %bwt.color1 $+ ) Trigger:( $+ %bwt.color2 $+  $+ %bwt.trigger3 $+  $+ %bwt.color1 $+ ) Directory:( $+ %bwt.color2 $+  $+ %bwt.found3 $+  $+ %bwt.color1 $+ ) Size:( $+ %bwt.color2 $+  $+ %bwt.size3 $+  $+ %bwt.color1 $+ )
  66. n58=    .notice $nick  $+ %bwt.color1 $+ Match:( $+ %bwt.color2 $+ 4 $+ %bwt.color1 $+ ) Trigger:( $+ %bwt.color2 $+  $+ %bwt.trigger4 $+  $+ %bwt.color1 $+ ) Directory:( $+ %bwt.color2 $+  $+ %bwt.found4 $+  $+ %bwt.color1 $+ ) Size:( $+ %bwt.color2 $+  $+ %bwt.size4 $+  $+ %bwt.color1 $+ )
  67. n59=    .notice $nick  $+ %bwt.color1 $+ Match:( $+ %bwt.color2 $+ 5 $+ %bwt.color1 $+ ) Trigger:( $+ %bwt.color2 $+  $+ %bwt.trigger5 $+  $+ %bwt.color1 $+ ) Directory:( $+ %bwt.color2 $+  $+ %bwt.found5 $+  $+ %bwt.color1 $+ ) Size:( $+ %bwt.color2 $+  $+ %bwt.size5 $+  $+ %bwt.color1 $+ )
  68. n60=    .notice $nick  $+ %bwt.color2 $+ 5  $+ %bwt.color1 $+ of  $+ %bwt.color2 $+  $+ %bwt.found $+  $+ %bwt.color1 matches displayed. Please narrow your search
  69. n61=  .notice $nick  $+ %bwt.color1 $+ To access my fserv type the trigger in the channel window | goto done }
  70. n62=  :done
  71. n63=  unset %bwt.*
  72. n64=}
  73. n65=Menu Channel,Status,Query {
  74. n66=  @Find
  75. n67=  .enable: set %isfindon yes
  76. n68=  .disable: set %isfindon no
  77. n69=}
  78. n70=
  79. n71=alias bwfindfile {
  80. n72=  set %bwt.founddir 0 | set %bwt.i 0
  81. n73=  if ($2 == 0) {
  82. n74=    :loop
  83. n75=    inc %bwt.i
  84. n76=    set %bwt.key Fserve. $+ %bwt.i
  85. n77=    if ($readini $mircdir\docs\Settings.ini %bwt.key Status == On) {
  86. n78=      set %bwt.temp $readini $mircdir\docs\Settings.ini %bwt.key Root.Dir
  87. n79=      inc %bwt.founddir $findfile(%bwt.temp,$1,0)
  88. n80=    }
  89. n81=    if (%bwt.i < 5) { goto loop }
  90. n82=    return %bwt.founddir
  91. n83=  }
  92. n84=  else {
  93. n85=    set %bwt.countdown $2
  94. n86=    :loop2
  95. n87=    inc %bwt.i
  96. n88=    set %bwt.key Fserve. $+ %bwt.i
  97. n89=    if ($readini $mircdir\docs\Settings.ini %bwt.key Status == On) {
  98. n90=      set %bwt.temp $readini $mircdir\docs\settings.ini %bwt.key Root.dir
  99. n91=      set %bwt.founddir $findfile(%bwt.temp,$1,0)
  100. n92=      set %bwt.trigger.temp $readini $mircdir\docs\settings.ini %bwt.key Trigger
  101. n93=      if (%bwt.founddir >= %bwt.countdown) { return $findfile(%bwt.temp,$1,%bwt.countdown) }
  102. n94=      %bwt.countdown = %bwt.countdown - %bwt.founddir
  103. n95=    }
  104. n96=    if (%bwt.i < 5) { goto loop2 } 
  105. n97=  }
  106. n98=}
  107.